Profile of (eval 253)[Sub/Quote.pm:3]

Filename	(eval 253)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 13 statements in 291µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	10µs	36µs	JSON::Schema::Modern::Result::::BEGIN@6 JSON::Schema::Modern::Result::BEGIN@6
1	1	1	7µs	20µs	Method::Generate::Accessor::_Generated::BEGIN@20.107
1	1	1	3µs	3µs	Method::Generate::Accessor::_Generated::BEGIN@11.106
0	0	0	0s	0s	JSON::Schema::Modern::Result::output_format

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	1µs			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
3	1	1µs			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4	1	0s			my $isa_check_for_output_5fformat = ${$_[1]->{"\$isa_check_for_output_5fformat"}};
5					package JSON::Schema::Modern::Result;
6	2	69µs	2	62µs	# spent 36µs (10+26) within JSON::Schema::Modern::Result::BEGIN@6 which was called: # once (10µs+26µs) by Sub::Quote::_clean_eval at line 6 no warnings 'closure'; # spent 36µs making 1 call to JSON::Schema::Modern::Result::BEGIN@6 # spent 26µs making 1 call to warnings::unimport
7					sub output_format {
8					($_QUOTED,$_UNQUOTED) if 0;
9					# BEGIN quote_sub PRELUDE
10					package Method::Generate::Accessor::_Generated;
11					# spent 3µs within Method::Generate::Accessor::_Generated::BEGIN@11.106 which was called: # once (3µs+0s) by Sub::Quote::_clean_eval at line 16 BEGIN {
12	1	0s			$^H = 1762;
13	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
14	1	4µs			%^H = (
15					);
16	1	36µs	1	3µs	} # spent 3µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@11.106
17					# END quote_sub PRELUDE
18					(@_ > 1
19					? scalar do { my $value = $_[1];
20	2	173µs	2	33µs	# spent 20µs (7+13) within Method::Generate::Accessor::_Generated::BEGIN@20.107 which was called: # once (7µs+13µs) by Sub::Quote::_clean_eval at line 20 (do { no warnings "void"; package Type::Tiny; ((defined($value) and !ref($value) and $value =~ m{\A(?:(?:basic\|detailed\|flag\|strict_basic\|terse\|verbose))\z})) or Type::Tiny::_failed_check($isa_check_for_output_5fformat, "Enum[\"flag\",\"basic\",\"strict_basic\",\"detailed\",\"verbose\",\"terse\"]", $value, "attribute_name","output_format","attribute_step","isa check","mgaca","0","varname","\$self->{\"output_format\"}"); $value }), # spent 20µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@20.107 # spent 13µs making 1 call to warnings::unimport
21					($_[0]->{"output_format"} = $value),
22					($_[0]->{"output_format"}),
23					}
24					: $_[0]->{"output_format"}
25					) }
26	1	1µs			$$_UNQUOTED = \&output_format;
27					}
28	1	6µs			1;
29
30					;